Namespace Reports


    Public Class R_02_00402

        Public Sub CreateDataBindings()

            Me.XrTableCell_AssetName.DataBindings.Add("Text", Me.DataSource, "ASSET_NAME")
            Me.XrTableCell_Brand.DataBindings.Add("Text", Me.DataSource, "ASSET_BRAND")
            Me.XrTableCell_Color.DataBindings.Add("Text", Me.DataSource, "ASSET_COLOR")
            Me.XrTableCell_Count.DataBindings.Add("Text", Me.DataSource, "PURCHASE_QUANTITY")
            'Me.XrTableCell_Department.DataBindings.Add("Text", Me.DataSource, "TARGET_DEPARTMENT")
            Me.XrTableCell_Remark.DataBindings.Add("Text", Me.DataSource, "ASSET_REMARKS")
            Me.XrTableCell_Usage.DataBindings.Add("Text", Me.DataSource, "ASSET_USAGE")

        End Sub

    End Class
End Namespace
